* Appendix Table 1: Alternative specification for Volscho and Kelly (2012)

log using "vk_log.log", replace

use "vk_data.dta", clear

eststo m1: prais d.top1_cg l.top1_cg l.cdpercen l.divided l.union l.topmarg l.capgtax d.unemp l.unemp d.openness l.ln_rgdp05 d.real_sp l.real_sp l.shiller_hpi if year>1948

esttab m1 using vk_tab.tex, replace se nogap nonotes r2 /// 
	title(Alternative specification for Volscho and Kelly (2012)) ///
	mtitles("$\Delta$ Top 1\%\textsubscript{t}") ///
	coeflabels(L.top1_cg "Top 1\%\textsubscript{t-1}" ///
		L.cdpercen "\% Cong Dems\textsubscript{t-1}" ///
		L.divided "\% Divided Govt\textsubscript{t-1}" ///
		L.union "\% Union Membership\textsubscript{t-1}" ///
		L.topmarg "\% Top Marginal Tax\textsubscript{t-1}" ///
		L.capgtax "Capital Gains Tax Rate\textsubscript{t-1}" ///
		D.unemp "$\Delta$ Unemplyment\textsubscript{t}" ///
		L.unemp "Unemplyment\textsubscript{t-1}" ///
		D.openness "Trade Openness\textsubscript{t}" ///
		L.ln_rgdp05 "Log RGDP\textsubscript{t-1}" ///
		D.real_sp "$\Delta$ Real S\&P 500 Index\textsubscript{t}" ///
		L.real_sp "Real S\&P 500 Index\textsubscript{t-1}" ///
		L.shiller_hpi "Shiller HPI\textsubscript{t-1}" ///
		_cons "Constant")

log close
